assume cs:codesg
codesg segment
   mov ax, 20h
   mov ds, ax
   mov cx, 64
   mov bx, 0H

s: 
   mov [bx], bl
   inc bl
   loop s

   mov ax, 4C00H
   int 21H

codesg ends

end
